* Add a type specifier test

	* test/lisp/emacs-lisp/comp-cstr-tests.el
	(comp-cstr-typespec-tests-alist): Add testcase.

diff --git a/test/lisp/emacs-lisp/comp-cstr-tests.el b/test/lisp/emacs-lisp/comp-cstr-tests.el
index f5ed05244d72b7a8fde3e8198475a556662a31ea..b4db54666c7f385740ea62a62c843cdba5b9c922 100644 (file)
--- a/test/lisp/emacs-lisp/comp-cstr-tests.el
+++ b/test/lisp/emacs-lisp/comp-cstr-tests.el
@@ -209,7 +209,9 @@
       ;; 84
       ((not nil) . t)
       ;; 85
-      ((or (not string) t) . t))
+      ((or (not string) t) . t)
+      ;; 86
+      ((or (not vector) sequence) . sequence))
     "Alist type specifier -> expected type specifier."))
 
 (defmacro comp-cstr-synthesize-tests ()